Imports System
Imports System.Collections.Generic
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Input
Imports System.Windows.Media
Imports System.Windows.Media.Animation
Imports System.Windows.Media.Imaging
Imports System.Windows.Navigation
Imports System.Windows.Shapes
Imports OMANE.Common.UI
Imports ICSharpCode.AvalonEdit.Highlighting
Imports System.CodeDom.Compiler
Imports System.Linq.Expressions
Imports System.Data
Imports OMANE.Modules.Builder.MSFunctions
Imports OMANE.Modules.Builder.MSExpression
Imports ICSharpCode.AvalonEdit.CodeCompletion
Imports System.ComponentModel


Public Class TestParams

    Dim _PoidsIdeal As OMANE.Modules.Builder.MSParam(Of Double)
    Dim _TailleIdeal As OMANE.Modules.Builder.MSParam(Of Double)
    Dim _CoefficientIdeal As OMANE.Modules.Builder.MSParam(Of Double)
    Dim _Correctif As OMANE.Modules.Builder.MSParam(Of Double)
    Dim _AcceptEvryone As OMANE.Modules.Builder.MSParam(Of Boolean)

    Sub New(ByVal mdl As MSUniverse)

        Me._PoidsIdeal = New MSParam(Of Double)("PoidsIdeal", mdl)
        Me._TailleIdeal = New MSParam(Of Double)("TailleIdeal", mdl)
        Me._CoefficientIdeal = New MSParam(Of Double)("CoefficientIdeal", mdl)
        Me._Correctif = New MSParam(Of Double)("Correctif", mdl)
        Me._AcceptEvryone = New MSParam(Of Boolean)("AcceptEvryone", mdl)

    End Sub

    Public ReadOnly Property PoidsIdeal As MSParam(Of Double)
        Get
            Return _TailleIdeal
        End Get
    End Property
    Public ReadOnly Property TailleIdeal As MSParam(Of Double)
        Get
            Return _TailleIdeal
        End Get
    End Property
    Public ReadOnly Property CoefficientIdeal As MSParam(Of Double)
        Get
            Return _CoefficientIdeal
        End Get
    End Property
    Public ReadOnly Property Correctif As MSParam(Of Double)
        Get
            Return _Correctif
        End Get
    End Property
    Public ReadOnly Property AcceptEvryone As MSParam(Of Boolean)
        Get
            Return _AcceptEvryone
        End Get
    End Property
End Class
